home *** CD-ROM | disk | FTP | other *** search
/ Kyoko 8203 / Kyoko 8203.iso / pc / clip.dxr / 00026_ÉrÉfÉIèâä²âª.ls < prev    next >
Encoding:
Text File  |  2003-03-10  |  634 b   |  37 lines

  1. global page, maxvideo, minvideo, videonumber
  2.  
  3. on prepareFrame
  4.   sprite(37).visible = 1
  5.   case page of
  6.     1:
  7.       videonumber = 5
  8.     2:
  9.       videonumber = 8
  10.     3:
  11.       videonumber = 2
  12.     4:
  13.       videonumber = 11
  14.     5:
  15.       videonumber = 5
  16.     6:
  17.       videonumber = 2
  18.     7:
  19.       videonumber = 1
  20.     8:
  21.       videonumber = 2
  22.     9:
  23.       videonumber = 2
  24.   end case
  25.   if videonumber <= 4 then
  26.     minvideo = 300
  27.     maxvideo = 300
  28.     sprite(44).visible = 0
  29.     sprite(45).visible = 0
  30.   else
  31.     minvideo = 300
  32.     maxvideo = 300 - ((videonumber - 4) * 134)
  33.     sprite(44).visible = 1
  34.     sprite(45).visible = 1
  35.   end if
  36. end
  37.